package xyz.zeer.endangeredanimal;

import android.content.Context;
import android.content.Intent;
import android.os.Bundle;
import android.util.Log;
import android.view.LayoutInflater;
import android.view.View;
import android.view.ViewGroup;
import androidx.annotation.NonNull;
import androidx.annotation.Nullable;
import androidx.fragment.app.Fragment;
import androidx.recyclerview.widget.LinearLayoutManager;
import androidx.recyclerview.widget.RecyclerView;

import java.util.ArrayList;

public class HomeFragment extends Fragment implements HomeAdapter.SelectedAnimalHome, HomeAdapter.ImageSelectedHome{

    private RecyclerView yrs_homeRecyclerView;
    private HomeAdapter yrs_homeAdapter;
    private ArrayList<HomeModel> yrs_list;

    @Nullable
    @Override
    public View onCreateView(@NonNull LayoutInflater inflater, @Nullable ViewGroup container, @Nullable Bundle savedInstanceState) {
        View view = inflater.inflate(R.layout.yrs_home_fragment, container, false);
        yrs_homeRecyclerView = view.findViewById(R.id.recyclerViewHome);

        addingDataHome();
        buildRecyclerViewHome();

        return view;
    }

    private void buildRecyclerViewHome() {
        LinearLayoutManager linearLayoutManager = new LinearLayoutManager(this.getActivity());
        linearLayoutManager.setOrientation(RecyclerView.VERTICAL);
        yrs_homeRecyclerView.setLayoutManager(linearLayoutManager);
        yrs_homeAdapter = new HomeAdapter(yrs_list, getContext(), this, this);
        yrs_homeRecyclerView.setAdapter(yrs_homeAdapter);
    }

    private void addingDataHome() {
        yrs_list = new ArrayList<>();
        yrs_list.add(new HomeModel(R.drawable.african_forest_elephant,getString(R.string.African_forest_elephant),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.amur_leopard,getString(R.string.Amur_Leopard),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.black_rhino,getString(R.string.Black_Rhino),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.bornean_orangutan,getString(R.string.Bornean_Orangutan),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.cross_river_gorilla,getString(R.string.Cross_River_Gorilla),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.eastern_lowland_gorilla,getString(R.string.Eastern_Lowland_Gorilla),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.hawksbill_turtle,getString(R.string.Hawksbill_Turtle),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.javan_rhino,getString(R.string.Javan_Rhino),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.orangutan,getString(R.string.Orangutan),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.saola,getString(R.string.Saola),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.sumatran_elephant,getString(R.string.Sumatran_Elephant),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.sumatran_orangutan,getString(R.string.Sumatran_Orangutan),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.sumatran_rhino,getString(R.string.Sumatran_Rhino),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.sunda_tiger,getString(R.string.Sunda_Tiger),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.vaquita,getString(R.string.Vaquita),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.western_lowland_gorilla,getString(R.string.Western_Lowland_Gorilla),R.drawable.arrow));
        yrs_list.add(new HomeModel(R.drawable.yangtze_finless_porpoise,getString(R.string.Yangtze_Finless_Porpoise),R.drawable.arrow));
    }


    @Override
    public void selectedAnimalHome(HomeModel homeModel, Context context, int position) {
        Intent intent = new Intent(getContext(), InfoActivity.class);
        intent.putExtra("ImageURL", homeModel.getAnimalImageResource());
        intent.putExtra("AnimalName", homeModel.getNameOfAnimal());
        intent.putExtra("AnimalInfo", info[position]);
        intent.putExtra("AnimalStatus", status[position]);
        Log.e("HomeFragment", "Animal name : " + homeModel.getNameOfAnimal());
        startActivity(intent);
    }

    @Override
    public void imageSelectedHome(HomeModel homeModel, Context context) {
        Intent intent = new Intent(getContext(), ImageActivity.class);
        intent.putExtra("Image", homeModel.getAnimalImageResource());
        Log.e("Home Fragment", "imageSelectedHome: " + homeModel.getNameOfAnimal());
        startActivity(intent);
    }

    String[] info = {"非洲森林象是非洲稀树草原象难以捉摸的表亲。它们栖息在西非和中非茂密的热带雨林中。它们对茂密森林栖息地的偏好禁止传统的计数方法，如视觉识别。它们的数量通常通过“粪便计数”来估计 - 对粪便密度和分布的分析。\n" +
                    "\n" +
                    "非洲森林象比其他非洲象物种非洲稀树草原象小。它们的耳朵更椭圆形，象牙更直，指向下方（稀树草原大象的象牙向外弯曲）。头骨和骨骼的大小和形状也存在差异。森林象的繁殖速度也比稀树草原象慢得多，因此它们无法以同样的速度从种群下降中恢复过来。他们的最后据点位于加蓬和刚果共和国，其他非洲国家（喀麦隆、中非共和国、赤道几内亚）和西非的科特迪瓦、利比里亚和加纳的人口较少。\n" +
                    "\n" +
                    "非洲森林象生活在多达 20 只的家庭群体中，以树叶、草、种子、水果和树皮为食。由于森林象的饮食以水果为主，它们在分散许多树种方面起着至关重要的作用，特别是碳含量往往很高的大树的种子。因此，他们被称为“森林的超级园丁”。为了补充矿物质，它们聚集在富含矿物质的水潭和遍布森林的矿物舔舐中。",

            "人们通常会想到非洲稀树草原上的豹子，但在俄罗斯远东地区，一个罕见的亚种已经适应了温带森林中的生活，这些森林构成了该物种分布的最北端。与其他豹子类似，阿穆尔豹可以以每小时37英里的速度奔跑。据报道，这种令人难以置信的动物水平跳跃超过 19 英尺，垂直跳跃高达 10 英尺。\n" +
            "\n" +
            "阿穆尔豹是孤独的。它脚步灵活，强壮，携带和隐藏未完成的杀戮，以免它们被其他掠食者捕获。据报道，一些雄性在交配后与雌性在一起，甚至可能有助于抚养幼崽。有时有几只雄性跟随并争夺雌性。它们的寿命为 10-15 年，囚禁长达 20 年。阿穆尔豹也被称为远东豹、满洲豹或朝鲜豹。",

                    "在黑犀牛和白犀牛中，黑犀牛是两种非洲犀牛中较小的一种。黑犀牛和白犀牛可以通过嘴唇的形状来区分。黑犀牛有钩状的上唇，而白犀牛的特点是方形的嘴唇。黑犀牛是浏览器，而不是食草动物，这意味着它们是食草动物，不以低生长的植被为食，它们的尖嘴唇帮助它们以灌木丛和树木的叶子为食。它们有两个角，在犀牛的一生中（像人类的指甲一样）从基部的皮肤中不断生长。前喇叭比后喇叭长，平均长约 19 英寸。\n" +
                    "\n" +
                    "20世纪，黑犀牛的数量在欧洲猎人和定居者手中急剧下降。从1960年到1995年，黑犀牛的数量下降了98%，不到2，500头。从那以后，该物种从灭绝的边缘卷土重来。由于非洲各地的持续保护工作，黑犀牛的数量从20年前的历史低点翻了一番，达到今天的6多头。然而，黑犀牛仍然被认为是极度濒危的，还有很多工作要做，才能使它们的数量达到曾经的一小部分，并确保它留在那里。野生动物犯罪 - 在这种情况下，偷猎犀牛以非法国际市场争夺犀牛角 - 继续困扰着该物种并威胁其恢复。",

            "婆罗洲猩猩的数量在过去50年中下降了60%以上，在过去的55年中，该物种的栖息地减少了至少20%。\n" +
            "\n" +
            "婆罗洲猩猩的外观与苏门答腊猩猩不同，脸更宽，胡须较短，颜色也略深。三个亚种被识别出来，每个亚种都位于岛上的不同地区：\n" +
            "\n" +
            "\t婆罗洲西北部猩猩是最受威胁的亚种。它的栖息地受到伐木和狩猎的严重影响，只剩下大约1，500只。该地区的许多栖息地斑块很小且支离破碎。\n"+
            "\t婆罗洲西北部猩猩是最受威胁的亚种。它的栖息地受到伐木和狩猎的严重影响，只剩下大约1，500只。该地区的许多栖息地斑块很小且支离破碎。\n"+
            "\t婆罗洲中部猩猩是动物最多的亚种，至少有35，000只。",

                    "西部大猩猩的这个亚种在外观上与数量更多的西部低地大猩猩非常相似，但在头骨和牙齿尺寸上可以找到细微的差异。克罗斯河大猩猩生活在一个由许多人类居住的地区，他们侵占了大猩猩的领地——砍伐森林寻找木材，为农业和牲畜创造田地。偷猎也发生在森林中，即使失去一些这些大猩猩也会对如此小的种群产生不利影响。\n" +
                    "\n" +
                    "保护这些动物的努力集中在保护容纳它们的森林上。世界自然基金会及其合作伙伴与喀麦隆和尼日利亚政府合作，为跨越这两个国家边界的克罗斯河大猩猩创建了一个保护区。",

            "东部低地大猩猩 - 也被称为格劳尔大猩猩 - 是四个大猩猩亚种中最大的一个。它与其他大猩猩的区别在于其粗壮的身体、大手和短的口吻。尽管体型庞大，但东部低地大猩猩主要以水果和其他草本材料为生，就像其他大猩猩亚种一样。\n" +
            "\n" +
            "刚果民主共和国（DRC）多年的内乱对东部低地大猩猩和山地大猩猩都造成了损失。东部低地大猩猩在刚果民主共和国东部的低地热带雨林中安家。在过去的50年里，它的范围从8，100平方英里（大约是马萨诸塞州的面积）减少到今天的约4，600平方英里。这个亚种现在可能只占其历史范围的13%。在17年代中期，东部低地大猩猩有近000，1990只，但科学家估计，从那时起，人口下降了50%以上。由于该地区的暴力事件，多年来一直无法准确计算动物的账目。\n" +
            "\n" +
            "在整个骚乱期间，大猩猩很容易受到偷猎，即使在卡胡齐 - 比加国家公园也是如此，该公园是受保护的东部低地大猩猩数量最多的家园。叛乱分子和偷猎者入侵公园，人们设置非法地雷。但是，在世界自然基金会和其他组织的帮助下，公园工作人员正在重建对土地的控制。",

                    "玳瑁因其狭窄而尖的喙而得名。它们的贝壳上也有重叠鳞片的独特图案，在边缘形成锯齿状外观。这些彩色和图案的贝壳使它们价值很高，通常在市场上作为“玳瑁”出售。\n" +
                    "\n" +
                    "玳瑁主要分布在世界热带海洋中，主要分布在珊瑚礁中。它们主要以海绵为食，用它们狭窄的尖喙将它们从礁石上的缝隙中取出，但也吃海葵和水母。海龟是一群爬行动物的活代表，这些爬行动物存在于地球上，在过去的100亿年里一直在我们的海洋中旅行。它们是海洋生态系统中的基本环节，有助于维持珊瑚礁和海草床的健康。",

            "爪哇犀牛是五种犀牛中受威胁最严重的，只有大约60只生活在印度尼西亚爪哇的乌戎库隆国家公园。爪哇犀牛曾经生活在印度东北部和东南亚。越南的最后一头爪哇犀牛是在2010年被偷猎的。\n" +
            "\n" +
            "该物种呈暗灰色，单角长达约 10 英寸。它的皮肤有许多松散的褶皱，给人一种装甲镀层的外观。爪哇犀牛在外观上与近亲大独角犀牛非常相似，但头部要小得多，皮肤褶皱也不太明显。",

                    "猩猩这个名字在马来语中的意思是“森林的人”。在它们居住的低地森林中，猩猩过着孤独的生活。它们以荔枝、山竹和无花果等野果为食，并从树洞中啜饮水。它们在植被树上筑巢，晚上睡觉，白天休息。成年雄性猩猩的体重可达 200 磅。法兰男性有突出的脸颊垫，称为法兰和喉囊，用于发出响亮的话语，称为长叫。一个没有兰兰的雄性看起来像一个成年雌性。在灵长类动物中独特的生物学现象中，由于尚未完全了解的原因，无法法兰的雄性可以变为法兰雄性。\n" +
                    "\n" +
                    "婆罗洲和苏门答腊猩猩的外观和行为略有不同。虽然两者都有毛茸茸的红色皮毛，但苏门答腊猩猩的面部毛发更长。据报道，苏门答腊猩猩比它们的婆罗洲表亲有更紧密的社会纽带。婆罗洲猩猩更有可能从树上下来在地面上移动。这两个物种都经历了急剧的种群下降。一个世纪前，总共可能有超过230，000只猩猩，但根据更新的地理范围（濒危），婆罗洲猩猩现在估计约为104，700只（濒危），苏门答腊约为7，500只（极度濒危）。",

            "1992年50月，越南林业部和世界自然基金会在越南中北部进行联合调查时发现了这种saola。该团队在猎人的家中发现了一个头骨，长着不寻常的长而直的角，并知道这是非凡的东西。这一发现被证明是20多年来第一个新的大型哺乳动物，也是20世纪最壮观的动物学发现之一。\n" +
            "\n" +
            "Saola（发音：sow-la）由两个具有尖锐末端的平行角识别，其长度可达20英寸，在雄性和雌性上都有发现。在越南语中意为“纺锤角”，它们是牛的表亲，但类似于羚羊。Saola的面部有醒目的白色斑纹，口吻上有大的上颌腺，可用于标记领地或吸引配偶。它们仅在越南和老挝的安南山脉发现。",

                    "苏门答腊象以各种植物为食，无论走到哪里都会沉积种子，为健康的森林生态系统做出贡献。它们还与其他几种濒危物种共享茂密的森林栖息地，如苏门答腊犀牛、老虎和猩猩，以及无数其他物种，这些物种都受益于在健康栖息地茁壮成长的大象种群。",

            "苏门答腊猩猩几乎完全是树栖的，生活在热带雨林的树木中。雌性几乎从不在地面上旅行，成年雄性也很少这样做。据报道，苏门答腊猩猩比它们的婆罗洲表亲有更密切的社会联系。这归因于无花果树上的大量水果，苏门答腊猩猩群可以聚集在一起觅食。成年雄性通常是独居的，而雌性则有后代陪伴。\n" +
            "\n" +
            "历史上，苏门答腊猩猩分布在整个苏门答腊岛，并进一步向南进入爪哇。该物种的范围现在仅限于该岛的北部，主要分布在北苏门答腊省和亚齐省。在现有的九个苏门答腊猩猩种群中，只有七个具有长期生存的前景，每个种群估计有250只或更多的个体。只有三个种群包含超过1只猩猩。从非法贸易中被没收或作为宠物被没收的猩猩正在被重新引入武吉蒂加普鲁国家公园。它们的数量约为000种，并且正在繁殖。",

                    "苏门答腊犀牛是现存犀牛中最小的，也是唯一有两只角的亚洲犀牛。它们长满了长毛，与灭绝的毛犀牛的关系比今天活着的任何其他犀牛物种都更密切。小牛出生时有一层致密的覆盖物，在年轻成虫中变成红褐色，在老年动物中变得稀疏、刚毛和几乎黑色。苏门答腊犀牛与爪哇犀牛争夺最受威胁的犀牛物种的不令人羡慕的称号。虽然苏门答腊犀牛的生存数量可能比爪哇犀牛多，但由于栖息地丧失和破碎化，苏门答腊犀牛受到的威胁更大。其余的动物在小而分散的无法存活的种群中生存，并且找到彼此繁殖的可能性有限，其种群数量继续下降。在过去的15年里，只有两只圈养的雌性繁殖。\n" +
                    "\n"+
                    "苏门答腊犀牛曾经漫游到不丹和印度东部喜马拉雅山脉东部的山麓，穿过缅甸，泰国，可能到达越南和中国，并向南穿过马来半岛。今天，该物种只在印度尼西亚的苏门答腊岛和婆罗洲岛上生存。专家认为，第三个亚种可能已经灭绝。",

            "巽他虎的特点是橙色外套上有浓重的黑色条纹。最后一批巽他岛虎——估计今天不到400只——正在苏门答腊岛上剩余的森林中生存。加速的森林砍伐和猖獗的偷猎意味着这种高贵的生物最终可能会像爪哇和巴厘岛的同类一样灭绝。\n" +
            "\n"+
            "在印度尼西亚，任何被抓到猎杀老虎的人都可能面临监禁和巨额罚款。但是，尽管加大了老虎保护力度，包括加强执法和反偷猎能力，但苏门答腊岛和亚洲其他地区的老虎器官和产品仍有巨大的市场。巽他虎正在迅速失去栖息地和猎物，偷猎是一个永远存在的威胁。",

                    "小头鼠海豚是世界上最稀有的海洋哺乳动物，正处于灭绝的边缘。鲸目动物——鲸鱼、海豚和鼠海豚——作为一个整体的困境，墨西哥小头鼠海豚的迅速减少就是一个例子，只剩下大约10只。这种小江豚直到1958年才被发现，半个多世纪后，我们正处于永远失去它们的边缘。小头鼠海豚经常被捕获并淹死在墨西哥加利福尼亚湾海洋保护区非法捕鱼作业使用的刺网中。在过去几年中，人口急剧下降。\n" +
                    "\n" +
                    "小头鼠海豚的眼睛周围有一个大的黑环，嘴唇上有黑色斑块，从嘴巴到胸鳍形成一条细线。它的顶部 - 背表面 - 是深灰色，它的侧面是浅灰色，它的下侧 - 腹面 - 是白色的，带有长而浅灰色的斑纹。新生小头鼠海豚的颜色较深，从头部到吸虫的宽灰色边缘，穿过背鳍和胸鳍。它们最常被发现在海湾浅水区靠近海岸的地方，尽管如果船只靠近，它们会很快游走。",

            "西部低地大猩猩是所有大猩猩亚种中数量最多、分布最广的。人口分布在喀麦隆、中非共和国、刚果民主共和国和赤道几内亚以及加蓬和刚果共和国的大片地区。西部低地大猩猩的确切数量尚不清楚，因为它们栖息在非洲一些最茂密和最偏远的热带雨林中。大量人口仍然存在，包括在刚果共和国孤立的沼泽和偏远的沼泽森林中。\n"+
            "\n"+
            "西部低地大猩猩与其他大猩猩亚种的区别在于它们的体型略小，棕灰色的外套和赤褐色的胸部。它们还有更宽的头骨，更明显的眉脊和更小的耳朵。大量没有保护西部低地大猩猩免受衰退。由于偷猎和疾病，大猩猩的数量在过去60到20年中下降了25%以上。即使消除了对西部低地大猩猩的所有威胁，科学家计算出人口也需要大约75年才能恢复。",

                    "长江是亚洲最长的河流，曾经是世界上仅有的两条河流之一，是两种不同种类的海豚的家园 - 长江江豚和白暨豚。然而，在2006年，白暨豚被宣布功能性灭绝。这是历史上第一次因为人类活动而将整个海豚物种从地球上抹去。它的近亲长江江豚以其调皮的笑容而闻名，智力水平可与大猩猩相媲美。"};


    String[] status = {"现状\n" +
                "\t极度濒危\n" +
                "高度\n" +
                "\t8-10英尺\n" +
                "重量\n" +
                "\t2-5吨\n" +
                "栖息地\n" +
                "\t茂密的热带森林",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t超过84\n" +
                "重量\n" +
                "\t70-105磅\n" +
                "栖息地\n" +
                "\t温带、阔叶林和混交林",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t超过6000\n" +
                "高度\n" +
                "\t5.2英尺\n" +
                "重量\n" +
                "\t1760-3080磅\n" +
                "栖息地\n" +
                "\t半沙漠稀树草原， 林地， 森林， 湿地",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t约104700\n" +
                "高度\n" +
                "\t3.3-4.6英尺\n" +
                "重量\n" +
                "\t66-220磅\n" +
                "栖息地\n" +
                "\t低地雨林和热带、沼泽和山地森林",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t200-300\n" +
                "高度\n" +
                "\t4-5英尺\n" +
                "重量\n" +
                "\t最重440磅",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t未知\n" +
                "高度\n" +
                "\t4-5英尺\n" +
                "重量\n" +
                "\t最重440磅",
            "现状\n" +
                "\t极度濒危\n" +
                "重量\n" +
                "\t90-150磅\n" +
                "长度\n" +
                "\t30-35英寸\n" +
                "栖息地\n" +
                "\t海洋",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t超过70\n" +
                "高度\n" +
                "\t4.6-5.8\n" +
                "重量\n" +
                "\t1984-5071磅\n" +
                "长度\n" +
                "\t10-10.5英尺\n" +
                "栖息地\n" +
                "\t热带雨林",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t约104，700（婆罗洲），13，846（苏门答腊），800（塔帕努里）\n" +
                "重量\n" +
                "\t最重220磅\n",
            "现状\n" +
                "\t极度濒危\n" +
                "肩宽\n" +
                "\t平均肩宽33英寸\n" +
                "重量\n" +
                "\t176-220磅\n" +
                "栖息地\n" +
                "\t常绿森林，旱季很少或没有",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t2400-2800\n" +
                "高度\n" +
                "\t5-9英尺\n" +
                "重量\n" +
                "\t约5吨\n" +
                "长度\n" +
                "\t最高20英尺\n" +
                "栖息地\n" +
                "\t阔叶湿润热带森林",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t14613\n" +
                "重量\n" +
                "\t66-198磅\n" +
                "长度\n" +
                "\t4-5英尺\n" +
                "栖息地\n" +
                "\t热带和亚热带潮湿阔叶林",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t少于80只，包括约30只成熟个体\n" +
                "高度\n" +
                "\t3.3-5英尺\n" +
                "重量\n" +
                "\t1320-2090磅\n" +
                "长度\n" +
                "\t6.5-13英尺\n" +
                "栖息地\n" +
                "\t茂密的高原和低地热带和亚热带森林",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t少于400\n" +
                "重量\n" +
                "\t165-308磅\n" +
                "栖息地\n" +
                "\t热带常绿阔叶林、淡水沼泽林和泥炭沼泽",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t约10\n" +
                "高度\n" +
                "\t最多5英尺\n" +
                "重量\n" +
                "\t最重120磅\n" +
                "栖息地\n" +
                "\t海洋（仅在加利福尼亚湾北部",
            "现状\n" +
                "\t极度濒危\n" +
                "高度\n" +
                "\t4-5英尺\n" +
                "重量\n" +
                "\t最重440磅",
            "现状\n" +
                "\t极度濒危\n" +
                "种群\n" +
                "\t1000-1800\n" +
                "长度" +
                "\t6.2英尺\n" +
                "栖息地\n" +
                "\t湖泊和河流"};
}
